home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 351-375 / disk_365 / dmeasm / .edrc next >
Text File  |  1992-05-06  |  2KB  |  68 lines
  1. #   DEVPAC ASSEMBLER  .EDRC file
  2. #
  3. #
  4.  
  5. unmap f10
  6. map c-tab   ``    ' left left left left'
  7. map cs-tab  `del del del del'
  8. map a-tab   `goto block while cb `c-tab down''
  9. map as-tab  `goto block while cb `cs-tab down''
  10. map c-up    top
  11. map c-down  bottom
  12. map s-up pageup
  13. map s-down  pagedown
  14. map enter `split first while c=32 `down ` ' up' down'
  15. map a-del `while c=32 del'
  16. map s-enter join
  17. map c-d bdelete
  18. map c-s `escimm `bsave ''
  19. map c-c bcopy
  20. map c-m bmove
  21. map f6  saveold
  22. map c-f10 `saveold quit'
  23. map c-right wright
  24. map c-left wleft
  25. map a-right `wright while !c=32 right'
  26. map a-left  `wleft left while c=32 left right'
  27. map help ref
  28. map s-help iconify
  29.  
  30. menuoff
  31.  
  32. menuadd Project Rename          (escimm (chfilename ))
  33. menuadd Project Load            arpload
  34. menuadd Project `Insert    f1'  f1
  35. menuadd Project `NewWindow f3'  f3
  36. menuadd Project `Save      f6'  f6
  37. menuadd Project SaveAs          arpsave
  38. menuadd Project Print           (saveas (PRT:))
  39. menuadd Project `SaveQuit F10'  f10
  40. menuadd Project Directory       (execute (dir))
  41. menuadd Project Quit            quit
  42. menuadd Convert LF->CRLF    (top repeat -1 (last tlate 13 down))
  43. menuadd Convert CRLF->LF    (top repeat -1 (last left if c=13 del down))
  44. menuadd Block   Indent       (goto block while cb (first (    ) down))
  45. menuadd Block   Backdent    (goto block while cb (first repeat 4 (if c=32 del) down))
  46. menuadd Block   `Save    C-s'   (escimm (bsave ))
  47. menuadd Block   `Copy    C-c'   bcopy
  48. menuadd Block   `Move    C-m'   bmove
  49. menuadd Block   `Delete  C-d'   bdelete
  50. menuadd Block   `Print   C-p'   (bsave (PRT:))
  51. menuadd Block   `Mark    C-b'   block
  52. menuadd Block   `Unmark  C-u'   unblock
  53. menuadd Tabs ` 2' (tabstop 2)
  54. menuadd Tabs ` 4' (tabstop 4)
  55. menuadd Tabs ` 6' (tabstop 6)
  56. menuadd Tabs ` 8' (tabstop 8)
  57. menuadd Tabs `10' (tabstop 10)
  58.  
  59. # menuadd Program `Assemble ' `if m saveold top first execute `GenIm2 \$filename -D''
  60. # menuadd Program `Asm -> .o' `if m saveold top first execute `GenIm2 \$filename -D -L''
  61. # menuadd Program `Asm ->Nil' `if m saveold top first execute `GenIm2 \$filename -B''
  62. # menuadd Program `Asm ->Lst' `if m saveold top first execute `GenIm2 \$filename -B -P''
  63.  
  64. menuadd Program `Assemble ' `if m saveold top first execute `DmeAsm \$filename''
  65.  
  66. menuon
  67.  
  68.